FishMarket 1.0/FishMarket v1.0.iso/fishies/101-125/disk_124/tarot/t.writerc

AmigaBASIC Source Code | 1992-05-06 | 9KB | 359 lines

CLEAR,25000
CLEAR,50000
  RESTORE positive
 Z$="Datac"
  OPEN Z$ FOR OUTPUT AS 1
  q$=""
  WHILE q$<>"-X-"
  PRINT q$
  READ q$
  WRITE #1,q$
  WEND
  CLOSE 1
  PRINT "BYE"
  END


 positive:
 DATA "14WX"
 DATA "A man of fair complexion or"
 DATA "someone born an ARIES"
 DATA "often a man of authority"
 DATA "a Patriarch & a countryman"
 DATA "a Married man with children"
 DATA "this card also represents"
 DATA "unexpected heritage or"
 DATA "a good Marriage!"
 DATA "14PX"
 DATA "A man of dark complexion or"
 DATA "someone born a TARUS"
 DATA "often a Chief of industry "
 DATA "a man of Knowledge or money"
 DATA "someone to rely upon!"
 DATA "14SX"
 DATA "A dark eyed man of Power"
 DATA "a Military or Goverment Man"
 DATA "A lawer or a man with Ideas"
 DATA "someone born a GEMINI!"
 DATA "14SX"
 DATA "someone born under CANCER"
 DATA "a friendly bachelor"
 DATA "a man of intelligence!"
 DATA "14CX"
 DATA "an artist or a man in love"
 DATA "he has kindness generosity"
 DATA "a favor for the seeker!"
 DATA "13WX"
 DATA "an animated magnetic woman"
 DATA "someone born a LEO"
 DATA "a natural home loving lady"
 DATA "mother nature at her best"
 DATA "good weather  friendship"
 DATA "sucess in undertakings!"
 DATA "13PX"
 DATA "a Thoughtful fertile woman"
 DATA "a blackeyed woman"
 DATA "a sculptor a Builder"
 DATA "freedom from material lack"
 DATA "wealth or good health"
 DATA "someone born under VIRGO!"
 DATA "13SX"
 DATA "A knowledge of sadness"
 DATA "a quick witted woman"
 DATA "someone born under LIBRA"
 DATA "An unavoidable decision"
 DATA "discovery of the truth"
 DATA "sorrow separation a widow!"
 DATA "13CX"
 DATA "a woman of fair complection"
 DATA "someone born under SCORPIO"
 DATA "a beloved woman wife mother"
 DATA "a gift of vision  dreams"
 DATA "a chance to act out dreams"
 DATA "imagination poetry"
 DATA "a peaceful idyllic period!"
 DATA "12WX"
 DATA "A good looking young man"
 DATA "SAGITARIUS the archer"
 DATA "conflict rivalry or Quest"
 DATA "a challenger or Champion"
 DATA "departure absence journey"
 DATA "change of residence!"
 DATA "12PX"
 DATA "a dark methodical youth"
 DATA "Patience & responsibility"
 DATA "hard labor toil harvest"
 DATA "Helpfullness an employee"
 DATA "a CAPRICORN!"
 DATA "12SX"
 DATA "a domineering force"
 DATA "a hero a storng youth"
 DATA "an AQUARIUS"
 DATA "someone rushing into the"
 DATA "life of the seeker"
 DATA "attack or defense"
 DATA "rescue or distruction!"
 DATA "12CX"
 DATA "a romantic dreamer"
 DATA "love may be approaching"
 DATA "the bearer of a message"
 DATA "a PISCES"
 DATA "Advances invitations"
 DATA "a proposition"
 DATA "a rocky road ahead!"
 DATA "11WX"
 DATA "a blond child  a postman"
 DATA "the changing of the tide"
 DATA "a faithful lover a new idea!"
 DATA "11PX"
 DATA "a dark child  a scholar"
 DATA "respect for learning"
 DATA "a bringer of fortune"
 DATA "new oppinions new ideas!"
 DATA "11SX"
 DATA "an active child  an athlete"
 DATA "a spy for good or ill"
 DATA "a period of Waiting"
 DATA "vigilance!"
 DATA "11CX"
 DATA "an imagitive child  news"
 DATA "new methods a birth!"
 DATA "10WX"
 DATA "a burden will be lifted"
 DATA "a goal is within reach"
 DATA "power unwisely used!"
 DATA "10PX"
 DATA "an established family"
 DATA "sucessful retirement"
 DATA "material well being"
 DATA "money spent on property"
 DATA "family matters inheritance"
 DATA "sucessful investments!"
 DATA "10SX"
 DATA "the end of delusion reality"
 DATA "ruin pain affliction tears"
 DATA "many burdens   misfortune"
 DATA "abandoned by friends!"
 DATA "10CX"
 DATA "Happy family life"
 DATA "promises are kept"
 DATA "Happiness to come!"
 DATA "9WX"
 DATA "a stout defense"
 DATA "be prepared for an attack"
 DATA "trouble approaches!"
 DATA "9PX"
 DATA "solitary enjoyment of life"
 DATA "a masterful woman"
 DATA "material well-being saftey"
 DATA "completion accomplishment!"
 DATA "9SX"
 DATA "The very depth of sorrow"
 DATA "misery suffering doubt!"
 DATA "9CX"
 DATA "assured future good health"
 DATA "physical satisfaction"
 DATA "a wealthy man!"
 DATA "8WX"
 DATA "a swift journey haste hope"
 DATA "speed toward a rewarding "
 DATA "goal  a time for movement!"
 DATA "8PX"
 DATA "craftsmanship employment"
 DATA "learning new skills"
 DATA "skill in business handiwork!"
 DATA "8SX"
 DATA "censure punishment bondage"
 DATA "no choice is given!"
 DATA "8CX"
 DATA "abandoning the present"
 DATA "situation rejection of the"
 DATA "easy road  accepting a"
 DATA "challenge a matter of small"
 DATA "importance!"
 DATA "7WX"
 DATA "stiff competiton  strife"
 DATA "courage in the face of "
 DATA "trouble!"
 DATA "7PX"
 DATA "growth through hard work"
 DATA "money barter or loan"
 DATA " a desirable mate partner!"
 DATA "7SX"
 DATA "Partial sucess or failure"
 DATA "a thief escapes uncertanity!"
 DATA "7CX"
 DATA "a dreamer has great dreams"
 DATA "building castles in the air"
 DATA "too many scattered ideas"
 DATA "unsubstantial attainment!"
 DATA "6WX"
 DATA "good news conquest victory"
 DATA "advancement promotion!"
 DATA "6PX"
 DATA "measured philanthropy"
 DATA "shared good fortune!"
 DATA "6SX"
 DATA "Journey by water"
 DATA "narrow escape from trouble"
 DATA "a guide takes you to saftey!"
 DATA "6CX"
 DATA "childhood  good memories"
 DATA "simplicity old ideas!"
 DATA "5WX"
 DATA "The battle of life"
 DATA "hard learned lessons"
 DATA "competition!"
 DATA "5PX"
 DATA "Spiritual impoverishment"
 DATA "loneliness destitution"
 DATA "love gone astray!"
 DATA "5SX"
 DATA "conquest through strength"
 DATA "creating more enemies"
 DATA "a threat is made!"
 DATA "5CX"
 DATA "bitterness loss with some"
 DATA "recovery a serious setback!"
 DATA "4WX"
 DATA "romance harmony prosperity"
 DATA "a harvest festival peace!"
 DATA "4PX"
 DATA "a miser clinging to gold"
 DATA "a loan may be denied"
 DATA "help is not given!"
 DATA "4SX"
 DATA "rest repose solitude"
 DATA "convalescence exile!"
 DATA "4CX"
 DATA "contemplation  hesitancy"
 DATA "discontent re-evaluation!"
 DATA "3WX"
 DATA "practical help from a"
 DATA "successful merchant"
 DATA "trade commerce partnership!"
 DATA "3PX"
 DATA "A strong foundation"
 DATA "well planned action"
 DATA "skill in art or trade"
 DATA "material increase!"
 DATA "3SX"
 DATA "the end of love  a divorce"
 DATA "sorrow or deep hatred!"
 DATA "3CX"
 DATA "strong friendship"
 DATA "a happy ending"
 DATA "a healing to come!"
 DATA "2WX"
 DATA "lord of the Manor"
 DATA "exploration"
 DATA "science dominion!"
 DATA "2PX"
 DATA "a dangerous time to launch"
 DATA "new projects avoid travel"
 DATA "harmony in midst of change"
 DATA "agility in handling problem!"
 DATA "2SX"
 DATA "Balanced Forces Stalemate"
 DATA "temporary truce impotence!"
 DATA "2CX"
 DATA "the beggining of love"
 DATA "friendship or commitment"
 DATA "an Engagement Partnership"
 DATA "harmony cooperation!"
 DATA "1WX"
 DATA "the beginning of invention"
 DATA "inspiration or creation"
 DATA "a birth of a child "
 DATA "the start of a fortune!"
 DATA "1PX"
 DATA "Weath attainment Prosperity!"
 DATA "1SX"
 DATA "great force in love & hate"
 DATA "activity fertility conquest!"
 DATA "1CX"
 DATA "Abundance nourishment joy"
 DATA "spiritual gifts!",
 DATA "1TX"
 DATA "Diplomacy power Mastery!"
 DATA "2TX"
 DATA "Hidden influences at work"
 DATA "Silence Mystery!"
 DATA "3TX"
 DATA "fertility for parents"
 DATA "Farmers & Artists"
 DATA "marrage & dissapation!"
 DATA "4TX"
 DATA "Leadership government"
 DATA "Mental activity!"
 DATA "5TX"
 DATA "conformity ritual"
 DATA "social approval!"
 DATA "temptation sin choice!"
 DATA "6TX"
 DATA "advances conquest"
 DATA "mastery of passion!"
 DATA "7TX"
 DATA "travel in comfort"
 DATA "joining forces with"
 DATA "the opposition to "
 DATA "reach a common goal!"
 DATA "8TX"
 DATA "the triumph of good"
 DATA "over evil!"
 DATA "9TX"
 DATA "silent council a guide"
 DATA "a possible journey!"
 DATA "10TX"
 DATA "unexpected luck"
 DATA "change of fortune!"
 DATA "11TX"
 DATA "leagal aspects"
 DATA "the proper mixture for"
 DATA "Chemists Cooks & for"
 DATA "politicians"
 DATA "a balanced education!"
 DATA "12TX"
 DATA "self sacrifice wisdom"
 DATA "suspended decisions!"
 DATA "13TX"
 DATA "transformation change"
 DATA "destruction regrowth"
 DATA "birth renewal!"
 DATA "14TX"
 DATA "modification adaption"
 DATA "conserving resources"
 DATA "good management!"
 DATA "0TX"
 DATA "a important choice"
 DATA "danger ignored!"
 DATA "15TX"
 DATA "revolutionary force"
 DATA "violence"
 DATA "black magic!"
 DATA "16TX"
 DATA "overthrow of order"
 DATA "mayhem confusion"
 DATA "bankruptcy disruption!"
 DATA "17TX"
 DATA "unselfish aid hope"
 DATA "courage health!"
 DATA "18TX"
 DATA "imagination intuition"
 DATA "perils secret foes"
 DATA "unlucky friend!"
 DATA "19TX"
 DATA "happy reunions joy"
 DATA "hot weather"
 DATA "simple life!"
 DATA "20TX"
 DATA "awakening rebirth"
 DATA "change of position!"
 DATA "21TX"
 DATA "triumph in all success"
 DATA "completion travel!"


 DATA "-X-"